object Form24: TForm24 Left = 334 Top = 147 Width = 396 Height = 248 Caption = 'Margins - printed page' Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = True OnDeactivate = FormDeactivate OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object Label1: TLabel Left = 89 Top = 5 Width = 203 Height = 16 Caption = 'Enter the page margins below. ' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 12 Top = 108 Width = 25 Height = 16 Caption = 'Left:' end object Label3: TLabel Left = 204 Top = 108 Width = 34 Height = 16 Caption = 'Right:' end object Label4: TLabel Left = 128 Top = 108 Width = 38 Height = 16 Caption = 'Label4' end object Label5: TLabel Left = 325 Top = 108 Width = 38 Height = 16 Caption = 'Label5' end object Label6: TLabel Left = 108 Top = 59 Width = 25 Height = 16 Caption = 'Top:' end object Label7: TLabel Left = 226 Top = 59 Width = 38 Height = 16 Caption = 'Label7' end object Label8: TLabel Left = 89 Top = 148 Width = 46 Height = 16 Caption = 'Bottom:' end object Label9: TLabel Left = 226 Top = 148 Width = 38 Height = 16 Caption = 'Label9' end object Label10: TLabel Left = 15 Top = 25 Width = 361 Height = 16 Caption = '(all margins are relative to minimum margins for current printer' + ')' end object Edit1: TEdit Left = 49 Top = 98 Width = 70 Height = 24 Hint = 'The left side of the image will be at this location. The image ' + 'is placed against the right margin if it will not fit between th' + 'e left margin entered here and the right side of the page. A la' + 'rge value will place images as far right as possible. ' ParentShowHint = False ShowHint = True TabOrder = 0 Text = '0.00' end object Edit2: TEdit Left = 246 Top = 98 Width = 70 Height = 24 Hint = 'The top of the image will be at this location. The image is pla' + 'ced against the bottom margin if it will not fit between the top' + ' margin entered here and the bottom of the page. A large value ' + 'will place images as low as possible. ' ParentShowHint = False ShowHint = True TabOrder = 1 Text = '0.00' end object BitBtn1: TBitBtn Left = 10 Top = 177 Width = 70 Height = 31 Hint = 'Use the above margins.' Caption = 'Ok' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = BitBtn1Click Kind = bkOK end object BitBtn2: TBitBtn Left = 276 Top = 177 Width = 92 Height = 31 Hint = 'Leave margins as they were before.' ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = BitBtn2Click Kind = bkCancel end object Edit3: TEdit Left = 148 Top = 49 Width = 70 Height = 24 TabOrder = 2 Text = '0.00' end object Edit4: TEdit Left = 148 Top = 138 Width = 70 Height = 24 TabOrder = 3 Text = '0.00' end end